﻿Public Class TipoSocio
    Dim ID_Tipo_Socio As Integer
    Dim Tipo As Integer
    Public Sub New()

    End Sub

    Public Sub New(ByVal id As Integer, ByVal tip As String)
        Me.ID_Tipo_Socio = id
        Me.Tipo = tip

    End Sub

    Public Property pID As Integer
        Get
            Return Me.ID_Tipo_Socio
        End Get
        Set(ByVal value As Integer)
            Me.ID_Tipo_Socio = value
        End Set
    End Property

    Public Property pTip As String
        Get
            Return Me.Tipo
        End Get
        Set(ByVal value As String)
            Me.Tipo = value
        End Set
    End Property

End Class
